chkip

#!/bin/bash################################ System Condition Analysis Script ##                             ##用途: For system CPU usage, memory, ##网络连接, disk space, System process ##交易数量以及交易日志进行分析 ##适用操作系统: Linux ##版本: 1.0 ##                          

How do I verify the IP address? Sub chkIP (boardid) Dim rsIP Dim ipArr Dim ignored Dim I Dim ip Dim SQL Ip = Request. ServerVariables ("REMOTE_ADDR ") Ignored = false If not isempty (boardid) then SQL = "select ignoreip from board where boardid =" &

Example The code is as follows Copy Code zj@zj:~/script/cushell/08.11.04$ Cat checkip.shView Plainprint?#!/bin/bashPrinterr () {echo "Incorrect IP format."ReadipChkip}Readip () {Read-p "Your IP:" IP}Chkip () {echo "$IP" |

The application of regular expressions to check the legality of visiting IP Sub Chkip (Boardid) Dim Rsip Dim Iparr Dim ignored Dim i Dim ip Dim sql Ip=request.servervariables ("REMOTE_ADDR") Ignored=false If not IsEmpty (Boardid) Then Sql= "Select

Sub Chkip (Boardid) Dim Rsip Dim Iparr Dim ignored Dim i Dim ip Dim sql Ip=request.servervariables ("REMOTE_ADDR") Ignored=false If not IsEmpty (Boardid) Then Sql= "Select Ignoreip from board where boardid=" &cstr (Boardid) Set

Write your permitted ip address range first. If you do not know, you need to go to the Internet to find an ip table to see a single IP address: if ($ REMOTE_ADDR12.34.56.78) {allow access} if it is a group of IP addresses, it depends on the range of

Regular Expression to check whether the access IP address is validSub chkIP (boardid)Dim rsIPDim ipArrDim ignoredDim IDim ipDim SQLIp = Request. ServerVariables ("REMOTE_ADDR ")Ignored = falseIf not isempty (boardid) thenSQL = "select ignoreip from

 Sub chkIP (boardid)　　　Dim rsIP　　　Dim ipArr　　　Dim ignored　　　Dim I　　　Dim ip　　　Dim SQL　　　Ip = Request. ServerVariables ("REMOTE_ADDR ")　　　 　　　Ignored = false　　　If not isempty (boardid) then　　　 　　　　SQL = "select ignoreip from board where boardid =" &

Sub Chkip (Boardid) 　　　 Dim Rsip 　　　 Dim Iparr 　　　 Dim ignored 　　　 Dim i 　　　 Dim ip 　　　 Dim sql 　　　 Ip=request.servervariables ("REMOTE_ADDR") 　　　 　　　 Ignored=false 　　　 If not IsEmpty (Boardid) Then 　　　 　　　　 Sql= "Select Ignoreip from board

Visiting Sub Chkip (Boardid) Dim Rsip Dim Iparr Dim ignored Dim i Dim ip Dim Sqlip=request.servervariables ("Remote_addr") Ignored=false If not IsEmpty (Boardid) Then Sql= "Select Ignoreip from board where boardid=" &cstr (Boardid) Set